package com.ruoyi.framework.aspectj;

import java.util.ArrayList;
import java.util.Arrays;
import java.util.List;
import java.util.stream.Collectors;

import org.aspectj.lang.JoinPoint;
import org.aspectj.lang.annotation.Aspect;
import org.aspectj.lang.annotation.Before;
import org.springframework.stereotype.Component;
import com.ruoyi.common.annotation.DataScope;
import com.ruoyi.common.constant.UserConstants;
import com.ruoyi.common.core.domain.BaseEntity;
import com.ruoyi.common.core.domain.entity.SysRole;
import com.ruoyi.common.core.domain.entity.SysUser;
import com.ruoyi.common.core.domain.model.LoginUser;
import com.ruoyi.common.core.text.Convert;
import com.ruoyi.common.utils.SecurityUtils;
import com.ruoyi.common.utils.StringUtils;
import com.ruoyi.framework.security.context.PermissionContextHolder;

/**
 * 数据过滤处理
 *
 * @author ruoyi
 */
@Aspect
@Component
public class DataScopeAspect
{
    /**
     * 全部数据权限
     */
    public static final String DATA_SCOPE_ALL = "1";

    /**
     * 自定数据权限
     */
    public static final String DATA_SCOPE_CUSTOM = "2";

    /**
     * 部门数据权限
     */
    public static final String DATA_SCOPE_DEPT = "3";

    /**
     * 部门及以下数据权限
     */
    public static final String DATA_SCOPE_DEPT_AND_CHILD = "4";

    /**
     * 仅本人数据权限
     */
    public static final String DATA_SCOPE_SELF = "5";

    /**
     * 省份数据权限
     */
    public static final String DATA_SCOPE_PROVINCE = "6";

    /**
     * 负责和协同数据权限
     */
    public static final String DATA_SCOPE_SYNERGY = "7";

    /**
     * 数据权限过滤关键字
     */
    public static final String DATA_SCOPE = "dataScope";

    @Before("@annotation(controllerDataScope)")
    public void doBefore(JoinPoint point, DataScope controllerDataScope) throws Throwable
    {
        //System.err.println("进入了切面");
        clearDataScope(point);
        handleDataScope(point, controllerDataScope);
    }

    protected void handleDataScope(final JoinPoint joinPoint, DataScope controllerDataScope)
    {
        // 获取当前的用户
        LoginUser loginUser = SecurityUtils.getLoginUser();
        if (StringUtils.isNotNull(loginUser))
        {
            SysUser currentUser = loginUser.getUser();
            // 如果是超级管理员，则不过滤数据
            if (StringUtils.isNotNull(currentUser) && !currentUser.isAdmin())
            {
                String permission = StringUtils.defaultIfEmpty(controllerDataScope.permission(), PermissionContextHolder.getContext());
                dataScopeFilter(joinPoint, currentUser, controllerDataScope.deptAlias(), controllerDataScope.userAlias(), permission, controllerDataScope.provinceAlias());
            }
        }
    }

    /**
     * 数据范围过滤
     *
     * @param joinPoint 切点
     * @param user 用户
     * @param deptAlias 部门别名
     * @param userAlias 用户别名
     * @param permission 权限字符
     */
    public static void dataScopeFilter(JoinPoint joinPoint, SysUser user, String deptAlias, String userAlias, String permission, String[] provinceAlias)
    {
        StringBuilder sqlString = new StringBuilder();
        List<String> conditions = new ArrayList<String>();
        List<String> scopeCustomIds = new ArrayList<String>();
        user.getRoles().forEach(role -> {
            if (DATA_SCOPE_CUSTOM.equals(role.getDataScope()) && StringUtils.equals(role.getStatus(), UserConstants.ROLE_NORMAL) && StringUtils.containsAny(role.getPermissions(), Convert.toStrArray(permission)))
            {
                scopeCustomIds.add(Convert.toStr(role.getRoleId()));
            }
        });

        for (SysRole role : user.getRoles())
        {
            String dataScope = role.getDataScope();
            if (conditions.contains(dataScope) || StringUtils.equals(role.getStatus(), UserConstants.ROLE_DISABLE))
            {
                continue;
            }
//            if (!StringUtils.containsAny(role.getPermissions(), Convert.toStrArray(permission)))
//            {
//                continue;
//            }
            if (DATA_SCOPE_ALL.equals(dataScope))
            {
                sqlString = new StringBuilder();
                conditions.add(dataScope);
                break;
            }
            else if (DATA_SCOPE_CUSTOM.equals(dataScope))
            {
                if (scopeCustomIds.size() > 1)
                {
                    // 多个自定数据权限使用in查询，避免多次拼接。
                    sqlString.append(StringUtils.format(" OR {}.dept_id IN ( SELECT dept_id FROM sys_role_dept WHERE role_id in ({}) ) ", deptAlias, String.join(",", scopeCustomIds)));
                }
                else
                {
                    sqlString.append(StringUtils.format(" OR {}.dept_id IN ( SELECT dept_id FROM sys_role_dept WHERE role_id = {} ) ", deptAlias, role.getRoleId()));
                }
            }
            else if (DATA_SCOPE_DEPT.equals(dataScope))
            {
                sqlString.append(StringUtils.format(" OR {}.dept_id = {} ", deptAlias, user.getDeptId()));
            }
            else if (DATA_SCOPE_DEPT_AND_CHILD.equals(dataScope))
            {
                sqlString.append(StringUtils.format(" OR {}.dept_id IN ( SELECT dept_id FROM sys_dept WHERE dept_id = {} or find_in_set( {} , ancestors ) )", deptAlias, user.getDeptId(), user.getDeptId()));
            }
            else if (DATA_SCOPE_SELF.equals(dataScope))
            {
                if (StringUtils.isNotBlank(userAlias))
                {
                    sqlString.append(StringUtils.format(" OR {}.user_id = {} ", userAlias, user.getUserId()));
                }
                else
                {
                    // 数据权限为仅本人且没有userAlias别名不查询任何数据
                    sqlString.append(StringUtils.format(" OR {}.dept_id = 0 ", deptAlias));
                }
            }
//            else if (DATA_SCOPE_PROVINCE.equals(dataScope)){
//                if(StringUtils.isNotBlank(provinceAlias)){
//                    //分配了省份权限的用户
//                    String province = user.getProvince();
//                    if(StringUtils.isNotNull(province)){
//                        if(province.contains(",")){
//                            String[] split = province.split(",");
//                            //拼接每个省份的‘’
//                            String collect = Arrays.stream(split)
//                                    .map(s -> "'" + s.trim() + "'")
//                                    .collect(Collectors.joining(","));
//                            sqlString.append(StringUtils.format(" OR {}.province in ( {} )", provinceAlias, collect));
//                        }else {
//                            sqlString.append(StringUtils.format(" OR {}.province in ( {} )", provinceAlias, "'"+user.getProvince()+"'"));
//                        }
//                    }
//                }
//            }


            else if (DATA_SCOPE_PROVINCE.equals(dataScope)) {
                if (provinceAlias != null && provinceAlias.length > 0) {
                    String province = user.getProvince();
                    if (StringUtils.isNotNull(province)) {
                        List<String> provinceConditions = new ArrayList<>();

                        // 处理省份条件，始终添加括号
                        String formattedProvince;
                        if (province.contains(",")) {
                            formattedProvince = "(" + Arrays.stream(province.split(","))
                                    .map(p -> "'" + p.trim() + "'")
                                    .collect(Collectors.joining(",")) + ")";
                        } else {
                            formattedProvince = "('" + province.trim() + "')"; // 单个值时添加括号
                        }

                        // 为每个表生成条件
                        for (String alias : provinceAlias) {
                            if (StringUtils.isNotBlank(alias)) {
                                provinceConditions.add(StringUtils.format("{}.province IN {}", alias, formattedProvince));
                            }
                        }

                        // 拼接所有表的条件
                        if (!provinceConditions.isEmpty()) {
                            sqlString.append(" OR (").append(String.join(" OR ", provinceConditions)).append(")");
                        }
                    }
                }
            }
//          else if (DATA_SCOPE_SYNERGY.equals(dataScope)) {
//                // 校验表别名是否为工单表的 "w"，且不为空
//                if (StringUtils.isNotBlank(userAlias) && "w".equals(userAlias)) {
//                    // 拼接带表别名的条件（w.principal_id 和 w.synergy_id）
//                    sqlString.append(StringUtils.format(
//                            " OR ({}.principal_id = {} OR {}.synergy_id = {}) ",
//                            userAlias, user.getUserId(), userAlias, user.getUserId()
//                    ));
//                }
//            }
                else if (DATA_SCOPE_SYNERGY.equals(dataScope)) {
                    // 校验表别名是否为工单表的 "w"，且不为空
                    if (StringUtils.isNotBlank(userAlias) && "w".equals(userAlias)) {
                        // 多协同人权限逻辑：当前用户ID是否在工单的协同人关联表中
                        sqlString.append(StringUtils.format(
                                " OR ({}.principal_id = {} OR EXISTS (" +
                                        "   SELECT 1 FROM workorder_synergy ws " +
                                        "   WHERE ws.workorder_id = {}.id " +
                                        "   AND ws.synergy_user_id = {}" +
                                        ")) ",
                                userAlias, user.getUserId(),  // 负责人权限（不变）
                                userAlias, user.getUserId()   // 协同人权限（关联新表）
                        ));
                    }
                }
            conditions.add(dataScope);
        }

        // 角色都不包含传递过来的权限字符，这个时候sqlString也会为空，所以要限制一下,不查询任何数据
//        if (StringUtils.isEmpty(conditions))
//        {
//            sqlString.append(StringUtils.format(" OR {}.dept_id = 0 ", deptAlias));
//        }

        if (StringUtils.isNotBlank(sqlString.toString()))
        {
            Object params = joinPoint.getArgs()[0];
            if (StringUtils.isNotNull(params) && params instanceof BaseEntity)
            {
                BaseEntity baseEntity = (BaseEntity) params;
                baseEntity.getParams().put(DATA_SCOPE, " AND (" + sqlString.substring(4) + ")");
            }
        }
    }

    /**
     * 拼接权限sql前先清空params.dataScope参数防止注入
     */
    private void clearDataScope(final JoinPoint joinPoint)
    {
        Object params = joinPoint.getArgs()[0];
        if (StringUtils.isNotNull(params) && params instanceof BaseEntity)
        {
            BaseEntity baseEntity = (BaseEntity) params;
            baseEntity.getParams().put(DATA_SCOPE, "");
        }
    }
}
